prolog './gspr.ijs'
NB. r. ------------------------------------------------------------------

(scheck r. $.x), (r. -: r.&.$.) x=:     _10+?    405$2
(scheck r. $.x), (r. -: r.&.$.) x=:     _10+?  3 4 5$21
(scheck r. $.x), (r. -: r.&.$.) x=:   o._10+?  3 4 5$21
(scheck r. $.x), (r. -: r.&.$.) x=:j./o._10+?2 3 4 5$21

1 -: 3 $. r. $. 0 1 0
1 -: 3 $. r. $. 2 3 4
1 -: 3 $. r. $. 2 3.4
1 -: 3 $. r. $. 2 3j4





epilog''

